with Ada.Text_Io; use Ada.Text_Io;
with Ada.Integer_Io; use Ada.Integer_Io;

package Pack_Temp is
   type Day is(Monday, Tuesday, Wenesday, Thursday, Friday, Saturday, Sunday);
   type Temp_Board is array( Day ) of Integer;

   procedure Init;
   procedure Saisie_Affiche;
   procedure Nb_Freeze;
   procedure Have_Freeze;
   procedure Average;
   procedure Max_Heat;

end Pack_Temp;
